Graphics Plus/Graphics Plus.iso/msdos/raytrace/pov/gen/form04a/sue/bowl.frm

Text File | 1994-01-25 | 322 b | 13 lines

Copyright (c) Sue Cunningham

s1 = torus 0.05, 1 stack 200 in 10% bend -40;
fan1 = [s1] fan 20, 45, 0.1;
bowl = sphere,  fan1 delete 1;
caves = torus 1.5, 7.5 stack 80 in 10% bend 360 twist 2*360, 3 grow 3;
cave_bowl = /* bigt, */ caves,  fan1;
caves;
// display caves;
//display cave&bowl;
// cave_bowl;
end;